Reach Derived Type

type, public :: Reach


Components

Type Visibility Attributes Name Initial
real(kind=float), public :: area

area drained by end section (m2)

integer, public :: i0

beginning of reach row

integer, public :: i1

end of reach row

integer, public :: id
integer, public :: j0

beginning of reach column

integer, public :: j1

end of reach column

real(kind=float), public :: length

reach length (m)

integer, public :: ncells

number of cells in a reach

integer, public :: order

Horton-Sthraler order

real(kind=float), public :: slope

average reach slope (m/m)

real(kind=float), public :: x0

beginning of reach x coordinate

real(kind=float), public :: x1

end of reach x coordinate

real(kind=float), public :: y0

beginning of reach y coordinate

real(kind=float), public :: y1

end of reach y coordinate


Source Code

TYPE Reach
	INTEGER :: id
	!====================================================
	REAL(KIND = float) :: x0 !! beginning of reach x coordinate
	REAL(KIND = float) :: y0 !! beginning of reach y coordinate
	REAL(KIND = float) :: x1 !! end of reach x coordinate
	REAL(KIND = float) :: y1 !! end of reach y coordinate
	!====================================================
	INTEGER :: i0	!! beginning of reach row
	INTEGER :: j0	!! beginning of reach column
	INTEGER :: i1	!! end of reach row
	INTEGER :: j1	!! end of reach column
	!====================================================
	INTEGER :: ncells !!number of cells in a reach
	INTEGER :: order !! Horton-Sthraler order
	REAL(KIND = float) :: slope	!! average reach slope (m/m)
	REAL(KIND = float) :: length	!!reach length (m)
	REAL(KIND = float) :: area	!! area drained by end section (m2)
END TYPE Reach